home *** CD-ROM | disk | FTP | other *** search
/ Scene Storm / Scene Storm - Volume 1.iso / coding / asm / music / protracker / src.lzh / ptdecompacter.s < prev    next >
Text File  |  1991-12-18  |  293b  |  21 lines
  1. ;--------------- PTDecompacter ----------------
  2.  
  3. Decompact
  4.     MOVE.B    (A0)+,D1
  5.     CMP.B    #181,D1
  6.     BEQ.s    DecodeIt
  7.     MOVE.B    D1,(A1)+
  8. decom2    SUBQ.L    #1,D0
  9.     BNE.s    Decompact
  10.     RTS
  11.  
  12. DecodeIt
  13.     MOVEQ    #0,D1
  14.     MOVE.B    (A0)+,D1
  15.     MOVE.B    (A0)+,D2
  16. dcdloop    MOVE.B    D2,(A1)+
  17.     DBRA    D1,dcdloop
  18.     SUBQ.L    #2,D0
  19.     BRA.s    decom2
  20.  
  21.